﻿Public Class ListaPersona

    Private strDC_RUT As String
    Private strDG_RAZON_SOCIAL As String
    Private strDG_GIRO_COMERCIAL As String
    Private strDG_MAIL As String


    Property DC_RUT() As String
        Get
            Return Me.strDC_RUT
        End Get
        Set(ByVal value As String)
            Me.strDC_RUT = value
        End Set
    End Property

    Property DG_RAZON_SOCIAL() As String
        Get
            Return Me.strDG_RAZON_SOCIAL
        End Get
        Set(ByVal value As String)
            Me.strDG_RAZON_SOCIAL = value
        End Set
    End Property


    Property DG_GIRO_COMERCIAL() As String
        Get
            Return Me.strDG_GIRO_COMERCIAL
        End Get
        Set(ByVal value As String)
            Me.strDG_GIRO_COMERCIAL = value
        End Set
    End Property

    Property DG_MAIL() As String
        Get
            Return Me.strDG_MAIL
        End Get
        Set(ByVal value As String)
            Me.strDG_MAIL = value
        End Set
    End Property


    Sub New()
    End Sub

    Sub New(ByVal _strDC_RUT As String)
        Me.strDC_RUT = _strDC_RUT
    End Sub

End Class